remove temp debugging code
authorJoey Hess <joeyh@joeyh.name>
Wed, 29 Jan 2025 21:19:01 +0000 (17:19 -0400)
committerJoey Hess <joeyh@joeyh.name>
Wed, 29 Jan 2025 21:19:01 +0000 (17:19 -0400)
Git/HashObject.hs

index 85d027348ba2593e6479a9a735367c728ae9b712..704d310c9dbda20c72228f50943a771a19a4af13 100644 (file)
@@ -5,7 +5,6 @@
  - Licensed under the GNU AGPL version 3 or higher.
  -}
 
-{-# LANGUAGE CPP #-}
 {-# LANGUAGE OverloadedStrings #-}
 
 module Git.HashObject where
@@ -49,10 +48,6 @@ hashFile hdl@(HashObjectHandle h _ _) file = do
        -- So, make the filename absolute, which will work now
        -- and also if git's behavior later changes.
        file' <- absPath file
-       -- XXX windows crash debugging
-#ifndef mingw32_HOST_OS
-       hPutStrLn stderr $ show ("hashFile called on file", file, "abspath is", file')
-#endif
        if newline `S.elem` file' || carriagereturn `S.elem` file
                then hashFile' hdl file
                else CoProcess.query h (send file') receive